10 A=A+1:IFA=1THENLOAD"MPRUN FILM",8,8
20 PRINT"[147]  FILMDISKETTE EINLEGEN"
30 INPUT"FILMNAME";A$
40 FORT=1TOLEN(A$):POKE49152+T-1,ASC(MID$(A$,T,1)):NEXT
50 POKE49152+T-1,ASC("*")
60 LOAD"MPVIEWER",8